home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Grab Bag
/
Shareware Grab Bag.iso
/
090
/
jazclib1.arc
/
JZPGEPRN.C
< prev
next >
Wrap
Text File
|
1986-05-06
|
790b
|
33 lines
/*
┌────────────────────────────────────────────────────────────────────────────┐
│jzpgeprn.c │
│Print directly to the screen and to a specific page │
│Unfortunately, out of lazyness, I don't avoid snow on this routine. │
│ │
│ (C) JazSoft Software by Jack A. Zucker (301) 794-5950 │
└────────────────────────────────────────────────────────────────────────────┘
*/
jzpgeprn(fstr,frow,fcol,fattr,fpage)
char *fstr;
int frow,fcol,fattr,fpage;
{
int far *screen;
register wcharattr,wchar;
screen = (int far *) 0xb8000000;
wcharattr = fattr << 8;
screen += fpage * 2048 + (frow * 80 + fcol);
while (*fstr) {
wcharattr &= 0xff00 ;
wcharattr |= *fstr++;
*screen++ = wcharattr;
}
}